home *** CD-ROM | disk | FTP | other *** search
/ SGI Freeware 1998 June / SGI Freeware 1998 June.iso / dist / fw_metamail.idb / usr / freeware / bin / showpicture.z / showpicture
Text File  |  1998-01-21  |  3KB  |  97 lines
  1. #!/bin/csh -fb
  2. # (The "-fb" might need to be changed to "-f" on some systems)
  3. #
  4. # Copyright (c) 1991 Bell Communications Research, Inc. (Bellcore)
  5. # 
  6. # Permission to use, copy, modify, and distribute this material 
  7. # for any purpose and without fee is hereby granted, provided 
  8. # that the above copyright notice and this permission notice 
  9. # appear in all copies, and that the name of Bellcore not be 
  10. # used in advertising or publicity pertaining to this 
  11. # material without the specific, prior written permission 
  12. # of an authorized representative of Bellcore.  BELLCORE 
  13. # MAKES NO REPRESENTATIONS ABOUT THE ACCURACY OR SUITABILITY 
  14. # OF THIS MATERIAL FOR ANY PURPOSE.  IT IS PROVIDED "AS IS", 
  15. # WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES.
  16. #
  17.  
  18. if (! $?METAMAIL_TMPDIR) then
  19.     set METAMAIL_TMPDIR=/tmp
  20. endif
  21.  
  22. if (! $?X_VIEWER) then
  23. set X_VIEWER="xloadimage -view -quiet -geometry +1+1"
  24. # set X_VIEWER="xv -geometry +1+1"
  25. endif
  26. if ($1 == "-viewer" && $#argv > 1) then
  27.     set X_VIEWER = "$2"
  28.     shift
  29.     shift
  30. endif
  31.  
  32. if (! $?MM_NOTTTY) then
  33.     set MM_NOTTTY=0
  34. endif
  35. if (! $?DISPLAY) then
  36.     echo ""
  37.     echo This message contains a picture, which can currently only be
  38.     echo viewed when running X11.  If you read this message while running
  39.     echo X11, and have your DISPLAY variable set, you will then
  40.     echo be able to see the picture properly.
  41.     echo ""
  42.     if ($MM_NOTTTY) then
  43.         set fname=${METAMAIL_TMPDIR}/sp.$$
  44.         echo "The picture is being automatically stored in the file $fname"
  45.         echo "If you do not want this file, please delete it."
  46.     else
  47.         echo -n "Do you want to write the picture out to a file [y] ? "
  48.         set ANS=$<
  49.         if ("$ANS" =~ n* ||  "$ANS" =~ N* ) exit 0
  50.         while ( 1 == 1)
  51.             echo -n "File name:"
  52.             set fname=$<
  53.             if (! -f $fname) then
  54.                 break
  55.             else
  56.                 echo "$fname already exists. Try again"
  57.             endif
  58.         end
  59.     endif
  60.     cp $1 $fname
  61.     if ($status == 0) echo Wrote file $fname
  62.     exit 0
  63. endif
  64.  
  65. if ($#argv == 0) then
  66.     set SQUIRREL=${METAMAIL_TMPDIR}/sp.$$
  67.     cat > $SQUIRREL
  68. else
  69.     set SQUIRREL="$*"
  70. endif
  71.  
  72. echo NOTE:  TO MAKE THE PICTURE WINDOW GO AWAY, JUST TYPE 'q' IN IT.
  73. if ($#argv == 0) then
  74.     echo "==> TO SAVE THIS IMAGE, COPY THE FILE $SQUIRREL BEFORE EXITING"
  75.     echo ""
  76.     $X_VIEWER $SQUIRREL
  77.     rm $SQUIRREL
  78. else
  79.  
  80. foreach i ($*)
  81.     echo "==> TO SAVE THIS IMAGE, COPY THE FILE $i BEFORE EXITING"
  82.     echo ""
  83.     set dir=$i:h
  84.     if ($dir != $i) then
  85.     # Make the ln sure to work    
  86.     cd $dir
  87.     endif
  88.     ln $i $$.PRESS-q-TO-EXIT 
  89.     if (! $status) then 
  90.         sh -c "$X_VIEWER $$.PRESS-q-TO-EXIT"
  91.         rm $$.PRESS-q-TO-EXIT 
  92.     else
  93.         sh -c "$X_VIEWER $i"
  94.     endif
  95. end
  96. endif
  97.